home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / LIBRARY / TOOLPAS2 / BLACK.PAS < prev    next >
Pascal/Delphi Source File  |  1992-01-02  |  146b  |  11 lines
  1. var
  2.    i,j:  integer;
  3. begin
  4.    for i := 1 to 50 do
  5.    begin
  6.       for j := 1 to 79 do
  7.          write(#177);
  8.       writeln;
  9.    end;
  10. end.
  11.